compose[".O"] := "{u+022e}" ; (Ȯ) O with dot above
compose[".p"] := "{u+1e57}" ; (ṗ) p with dot above
compose[".P"] := "{u+1e56}" ; (Ṗ) P with dot above
compose[".O"] := "{u+022e}" ; (Ȯ) O with dot above
compose[".p"] := "{u+1e57}" ; (ṗ) p with dot above
compose[".P"] := "{u+1e56}" ; (Ṗ) P with dot above